/ Linux Cubed Series 2: Applications / Linux Cubed Series 2 - Applications.iso / editors / emacs / xemacs / xemacs-1.006 / xemacs-1 / lib / xemacs-19.13 / lisp / ilisp / ilisp-xfr.elc

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 63 74 68 6f 6d 70 40 |piled by| cthomp@|
|00000020| 77 69 6c 6c 6f 77 2e 63 | 73 2e 75 69 75 63 2e 65 |willow.c|s.uiuc.e|
|00000030| 64 75 20 6f 6e 20 54 75 | 65 20 41 75 67 20 32 39 |du on Tu|e Aug 29|
|00000040| 20 31 39 3a 30 36 3a 35 | 36 20 31 39 39 35 0a 3b | 19:06:5|6 1995.;|
|00000050| 3b 3b 20 66 72 6f 6d 20 | 66 69 6c 65 20 2f 65 78 |;; from |file /ex|
|00000060| 70 6f 72 74 2f 77 69 6c | 6c 6f 77 33 2f 78 65 6d |port/wil|low3/xem|
|00000070| 61 63 73 2d 31 39 2e 31 | 33 2d 72 65 6c 65 61 73 |acs-19.1|3-releas|
|00000080| 65 2f 65 64 69 74 6f 72 | 2f 6c 69 73 70 2f 69 6c |e/editor|/lisp/il|
|00000090| 69 73 70 2f 69 6c 69 73 | 70 2d 78 66 72 2e 65 6c |isp/ilis|p-xfr.el|
|000000a0| 0a 3b 3b 3b 20 65 6d 61 | 63 73 20 76 65 72 73 69 |.;;; ema|cs versi|
|000000b0| 6f 6e 20 31 39 2e 31 33 | 20 58 45 6d 61 63 73 20 |on 19.13| XEmacs |
|000000c0| 4c 75 63 69 64 2e 0a 3b | 3b 3b 20 62 79 74 65 63 |Lucid..;|;; bytec|
|000000d0| 6f 6d 70 20 76 65 72 73 | 69 6f 6e 20 32 2e 32 35 |omp vers|ion 2.25|
|000000e0| 3b 20 31 2d 53 65 70 2d | 39 34 2e 0a 3b 3b 3b 20 |; 1-Sep-|94..;;; |
|000000f0| 6f 70 74 69 6d 69 7a 61 | 74 69 6f 6e 20 69 73 20 |optimiza|tion is |
|00000100| 6f 6e 2e 0a 3b 3b 3b 20 | 74 68 69 73 20 66 69 6c |on..;;; |this fil|
|00000110| 65 20 75 73 65 73 20 6f | 70 63 6f 64 65 73 20 77 |e uses o|pcodes w|
|00000120| 68 69 63 68 20 64 6f 20 | 6e 6f 74 20 65 78 69 73 |hich do |not exis|
|00000130| 74 20 69 6e 20 45 6d 61 | 63 73 20 31 38 2e 0a 0a |t in Ema|cs 18...|
|00000140| 28 69 66 20 28 61 6e 64 | 20 28 62 6f 75 6e 64 70 |(if (and| (boundp|
|00000150| 20 27 65 6d 61 63 73 2d | 76 65 72 73 69 6f 6e 29 | 'emacs-|version)|
|00000160| 0a 09 20 28 6f 72 20 28 | 61 6e 64 20 28 62 6f 75 |.. (or (|and (bou|
|00000170| 6e 64 70 20 27 65 70 6f | 63 68 3a 3a 76 65 72 73 |ndp 'epo|ch::vers|
|00000180| 69 6f 6e 29 20 65 70 6f | 63 68 3a 3a 76 65 72 73 |ion) epo|ch::vers|
|00000190| 69 6f 6e 29 0a 09 20 20 | 20 20 20 28 73 74 72 69 |ion)..  |   (stri|
|000001a0| 6e 67 2d 6c 65 73 73 70 | 20 65 6d 61 63 73 2d 76 |ng-lessp| emacs-v|
|000001b0| 65 72 73 69 6f 6e 20 22 | 31 39 22 29 29 29 0a 20 |ersion "|19"))). |
|000001c0| 20 20 20 28 65 72 72 6f | 72 20 22 54 68 69 73 20 |   (erro|r "This |
|000001d0| 66 69 6c 65 20 77 61 73 | 20 63 6f 6d 70 69 6c 65 |file was| compile|
|000001e0| 64 20 66 6f 72 20 45 6d | 61 63 73 20 31 39 2e 22 |d for Em|acs 19."|
|000001f0| 29 29 0a 0a 28 66 73 65 | 74 20 27 72 65 74 75 72 |))..(fse|t 'retur|
|00000200| 6e 2d 69 6c 69 73 70 20 | 23 5b 6e 69 6c 20 22 c0 |n-ilisp |#[nil ".|
|00000210| 70 21 89 19 ac 86 c2 c3 | 21 82 a3 00 c4 09 21 1d |p!......|!.....!.|
|00000220| c6 20 89 1e 07 ab e0 60 | 0d 59 ab 85 64 62 88 aa |. .....`|.Y..db..|
|00000230| 87 0d 62 88 0e 07 63 88 | 0e 08 ac 83 c9 63 88 0e |..b...c.|.....c..|
|00000240| 5c 6e 0e 07 21 ab 97 cb | cc 20 21 ac 8a cd cc 20 |\n..!...|. !.... |
|00000250| ce 5c 22 0e 07 98 ac 87 | cf cc 20 0e 07 5c 22 88 |.\".....|.. ..\".|
|00000260| 0e 10 0e 07 21 88 0e 11 | d2 3d ab 83 d3 16 14 d3 |....!...|.=......|
|00000270| 16 15 0e 16 09 0e 07 5c | 22 88 c4 09 21 60 d3 93 |.......\|"...!`..|
|00000280| 88 0e 17 60 d3 93 88 64 | 62 aa aa 0d 64 55 ab 99 |...`...d|b...dU..|
|00000290| d8 1e 19 0e 08 ac 83 c9 | 63 88 c4 09 21 60 d3 93 |........|c...!`..|
|000002a0| 88 0e 16 09 da 5c 22 29 | aa 8c c9 63 88 8c 0d 64 |.....\")|...c...d|
|000002b0| 7d 88 0e 1b 20 29 2a 29 | 87 22 20 5b 67 65 74 2d |}... )*)|." [get-|
|000002c0| 62 75 66 66 65 72 2d 70 | 72 6f 63 65 73 73 20 70 |buffer-p|rocess p|
|000002d0| 72 6f 63 20 65 72 72 6f | 72 20 22 43 75 72 72 65 |roc erro|r "Curre|
|000002e0| 6e 74 20 62 75 66 66 65 | 72 20 68 61 73 20 6e 6f |nt buffe|r has no|
|000002f0| 20 70 72 6f 63 65 73 73 | 22 20 70 72 6f 63 65 73 | process|" proces|
|00000300| 73 2d 6d 61 72 6b 20 70 | 6d 61 72 6b 20 69 6c 69 |s-mark p|mark ili|
|00000310| 73 70 2d 67 65 74 2d 6f | 6c 64 2d 69 6e 70 75 74 |sp-get-o|ld-input|
|00000320| 20 69 6e 70 75 74 20 69 | 6c 69 73 70 2d 6e 6f 2d | input i|lisp-no-|
|00000330| 6e 65 77 6c 69 6e 65 20 | 31 30 20 63 6f 6d 69 6e |newline |10 comin|
|00000340| 74 2d 69 6e 70 75 74 2d | 66 69 6c 74 65 72 20 72 |t-input-|filter r|
|00000350| 69 6e 67 2d 65 6d 70 74 | 79 2d 70 20 69 6c 69 73 |ing-empt|y-p ilis|
|00000360| 70 2d 67 65 74 2d 69 6e | 70 75 74 2d 72 69 6e 67 |p-get-in|put-ring|
|00000370| 20 72 69 6e 67 2d 72 65 | 66 20 30 20 69 6c 69 73 | ring-re|f 0 ilis|
|00000380| 70 2d 72 69 6e 67 2d 69 | 6e 73 65 72 74 20 63 6f |p-ring-i|nsert co|
|00000390| 6d 69 6e 74 2d 69 6e 70 | 75 74 2d 73 65 6e 74 69 |mint-inp|ut-senti|
|000003a0| 6e 65 6c 20 2b 69 6c 69 | 73 70 2d 65 6d 61 63 73 |nel +ili|sp-emacs|
|000003b0| 2d 76 65 72 73 69 6f 6e | 2d 69 64 2b 20 66 73 66 |-version|-id+ fsf|
|000003c0| 2d 31 39 20 6e 69 6c 20 | 63 6f 6d 69 6e 74 2d 69 |-19 nil |comint-i|
|000003d0| 6e 70 75 74 2d 72 69 6e | 67 2d 69 6e 64 65 78 20 |nput-rin|g-index |
|000003e0| 69 6c 69 73 70 2d 6f 72 | 69 67 69 6e 61 6c 20 63 |ilisp-or|iginal c|
|000003f0| 6f 6d 69 6e 74 2d 69 6e | 70 75 74 2d 73 65 6e 64 |omint-in|put-send|
|00000400| 65 72 20 63 6f 6d 69 6e | 74 2d 6c 61 73 74 2d 69 |er comin|t-last-i|
|00000410| 6e 70 75 74 2d 65 6e 64 | 20 74 20 63 6f 6d 69 6e |nput-end| t comin|
|00000420| 74 2d 73 65 6e 64 2d 6e | 65 77 6c 69 6e 65 20 22 |t-send-n|ewline "|
|00000430| 22 20 69 6e 64 65 6e 74 | 2d 6c 69 6e 65 2d 66 75 |" indent|-line-fu|
|00000440| 6e 63 74 69 6f 6e 5d 20 | 34 20 22 5c 0a 47 72 61 |nction] |4 "\.Gra|
|00000450| 62 20 74 68 65 20 63 75 | 72 72 65 6e 74 20 65 78 |b the cu|rrent ex|
|00000460| 70 72 65 73 73 69 6f 6e | 20 77 69 74 68 20 63 6f |pression| with co|
|00000470| 6d 69 6e 74 2d 67 65 74 | 2d 6f 6c 64 2d 69 6e 70 |mint-get|-old-inp|
|00000480| 75 74 2e 20 20 49 66 20 | 77 65 20 68 61 76 65 0a |ut.  If |we have.|
|00000490| 61 20 63 6f 6d 70 6c 65 | 74 65 20 73 65 78 70 2c |a comple|te sexp,|
|000004a0| 20 73 65 6e 64 20 69 74 | 2e 20 20 4f 74 68 65 72 | send it|.  Other|
|000004b0| 77 69 73 65 2c 20 69 6e | 64 65 6e 74 20 61 70 70 |wise, in|dent app|
|000004c0| 72 6f 70 72 69 61 74 65 | 6c 79 2e 22 20 6e 69 6c |ropriate|ly." nil|
|000004d0| 5d 29 0a 28 66 73 65 74 | 20 27 72 61 77 2d 6b 65 |]).(fset| 'raw-ke|
|000004e0| 79 73 2d 69 6c 69 73 70 | 20 23 5b 6e 69 6c 20 22 |ys-ilisp| #[nil "|
|000004f0| 08 ac 9c c1 20 1a c3 5c | 6e c4 5c 22 88 c5 c6 0e |.... ..\|n.\"....|
|00000500| 07 5c 22 ab 84 c1 20 16 | 08 c9 5c 6e ca cb 23 88 |.\"... .|..\n..#.|
|00000510| 5c 6e 10 29 cc 08 21 88 | cd 0e 0e 21 87 22 20 5b |\n.)..!.|...!." [|
|00000520| 69 6c 69 73 70 2d 72 61 | 77 2d 6d 61 70 20 6d 61 |ilisp-ra|w-map ma|
|00000530| 6b 65 2d 6b 65 79 6d 61 | 70 20 6d 61 70 20 66 69 |ke-keyma|p map fi|
|00000540| 6c 6c 61 72 72 61 79 20 | 69 6c 69 73 70 2d 73 65 |llarray |ilisp-se|
|00000550| 6e 64 2d 63 68 61 72 20 | 73 74 72 69 6e 67 2d 6d |nd-char |string-m|
|00000560| 61 74 63 68 20 22 4c 75 | 63 69 64 22 20 65 6d 61 |atch "Lu|cid" ema|
|00000570| 63 73 2d 76 65 72 73 69 | 6f 6e 20 69 6c 69 73 70 |cs-versi|on ilisp|
|00000580| 2d 63 6f 6d 70 6c 65 74 | 69 6f 6e 2d 6d 61 70 20 |-complet|ion-map |
|00000590| 64 65 66 69 6e 65 2d 6b | 65 79 20 22 07 22 20 69 |define-k|ey "." i|
|000005a0| 6e 74 65 72 61 63 74 69 | 76 65 2d 6b 65 79 73 2d |nteracti|ve-keys-|
|000005b0| 69 6c 69 73 70 20 75 73 | 65 2d 6c 6f 63 61 6c 2d |ilisp us|e-local-|
|000005c0| 6d 61 70 20 6d 65 73 73 | 61 67 65 20 69 6c 69 73 |map mess|age ilis|
|000005d0| 70 2d 72 61 77 2d 6d 65 | 73 73 61 67 65 5d 20 34 |p-raw-me|ssage] 4|
|000005e0| 20 22 5c 0a 53 74 61 72 | 74 20 75 73 69 6e 67 20 | "\.Star|t using |
|000005f0| 72 61 77 20 6b 65 79 62 | 6f 61 72 64 20 6d 6f 64 |raw keyb|oard mod|
|00000600| 65 20 74 6f 20 73 65 6e | 64 20 65 61 63 68 20 63 |e to sen|d each c|
|00000610| 68 61 72 61 63 74 65 72 | 20 74 79 70 65 64 20 74 |haracter| typed t|
|00000620| 6f 20 74 68 65 0a 69 6e | 66 65 72 69 6f 72 20 4c |o the.in|ferior L|
|00000630| 49 53 50 20 75 6e 74 69 | 6c 20 61 20 6b 65 79 20 |ISP unti|l a key |
|00000640| 62 6f 75 6e 64 20 74 6f | 20 69 6e 74 65 72 61 63 |bound to| interac|
|00000650| 74 69 76 65 2d 6b 65 79 | 73 2d 69 6c 69 73 70 20 |tive-key|s-ilisp |
|00000660| 69 73 0a 65 6e 63 6f 75 | 6e 74 65 72 65 64 2e 20 |is.encou|ntered. |
|00000670| 20 53 65 65 20 61 6c 73 | 6f 20 69 6f 2d 62 72 69 | See als|o io-bri|
|00000680| 64 67 65 2d 69 6c 69 73 | 70 2e 22 20 6e 69 6c 5d |dge-ilis|p." nil]|
|00000690| 29 0a 28 66 73 65 74 20 | 27 69 6e 74 65 72 61 63 |).(fset |'interac|
|000006a0| 74 69 76 65 2d 6b 65 79 | 73 2d 69 6c 69 73 70 20 |tive-key|s-ilisp |
|000006b0| 23 5b 6e 69 6c 20 22 c0 | 09 21 88 c2 c3 21 87 22 |#[nil ".|.!...!."|
|000006c0| 20 5b 75 73 65 2d 6c 6f | 63 61 6c 2d 6d 61 70 20 | [use-lo|cal-map |
|000006d0| 69 6c 69 73 70 2d 75 73 | 65 2d 6d 61 70 20 6d 65 |ilisp-us|e-map me|
|000006e0| 73 73 61 67 65 20 22 49 | 6e 74 65 72 61 63 74 69 |ssage "I|nteracti|
|000006f0| 76 65 20 6b 65 79 62 6f | 61 72 64 20 6d 6f 64 65 |ve keybo|ard mode|
|00000700| 22 5d 20 32 20 22 5c 0a | 47 6f 20 62 61 63 6b 20 |"] 2 "\.|Go back |
|00000710| 74 6f 20 69 6e 74 65 72 | 61 63 74 69 76 65 20 6b |to inter|active k|
|00000720| 65 79 62 6f 61 72 64 20 | 69 6e 74 65 72 61 63 74 |eyboard |interact|
|00000730| 69 6f 6e 73 20 69 6e 20 | 74 68 65 20 69 6e 66 65 |ions in |the infe|
|00000740| 72 69 6f 72 20 4c 49 53 | 50 2e 22 20 6e 69 6c 5d |rior LIS|P." nil]|
|00000750| 29 0a 28 66 73 65 74 20 | 27 69 6c 69 73 70 2d 73 |).(fset |'ilisp-s|
|00000760| 65 6e 64 2d 63 68 61 72 | 20 23 5b 6e 69 6c 20 22 |end-char| #[nil "|
|00000770| c0 c1 c2 5c 22 ab 94 64 | 62 88 0b 63 88 c4 c5 20 |...\"..d|b..c... |
|00000780| 21 60 c6 93 88 0e 07 60 | c6 93 88 c8 c5 20 c9 ca |!`.....`|..... ..|
|00000790| 0b 5c 22 5c 22 88 cb 0e | 0c 21 87 22 20 5b 69 6c |.\"\"...|.!." [il|
|000007a0| 69 73 70 2d 76 61 6c 75 | 65 20 69 6c 69 73 70 2d |isp-valu|e ilisp-|
|000007b0| 72 61 77 2d 65 63 68 6f | 20 74 20 6c 61 73 74 2d |raw-echo| t last-|
|000007c0| 69 6e 70 75 74 2d 63 68 | 61 72 20 70 72 6f 63 65 |input-ch|ar proce|
|000007d0| 73 73 2d 6d 61 72 6b 20 | 69 6c 69 73 70 2d 70 72 |ss-mark |ilisp-pr|
|000007e0| 6f 63 65 73 73 20 6e 69 | 6c 20 63 6f 6d 69 6e 74 |ocess ni|l comint|
|000007f0| 2d 6c 61 73 74 2d 69 6e | 70 75 74 2d 65 6e 64 20 |-last-in|put-end |
|00000800| 70 72 6f 63 65 73 73 2d | 73 65 6e 64 2d 73 74 72 |process-|send-str|
|00000810| 69 6e 67 20 6d 61 6b 65 | 2d 73 74 72 69 6e 67 20 |ing make|-string |
|00000820| 31 20 6d 65 73 73 61 67 | 65 20 69 6c 69 73 70 2d |1 messag|e ilisp-|
|00000830| 72 61 77 2d 6d 65 73 73 | 61 67 65 5d 20 35 20 22 |raw-mess|age] 5 "|
|00000840| 5c 0a 53 65 6e 64 20 74 | 68 65 20 6c 61 73 74 20 |\.Send t|he last |
|00000850| 74 79 70 65 64 20 63 68 | 61 72 61 63 74 65 72 20 |typed ch|aracter |
|00000860| 74 6f 20 74 68 65 20 63 | 75 72 72 65 6e 74 20 69 |to the c|urrent i|
|00000870| 6e 66 65 72 69 6f 72 20 | 4c 49 53 50 20 65 63 68 |nferior |LISP ech|
|00000880| 6f 69 6e 67 0a 69 66 20 | 69 6c 69 73 70 2d 72 61 |oing.if |ilisp-ra|
|00000890| 77 2d 65 63 68 6f 20 69 | 73 20 54 2e 22 20 6e 69 |w-echo i|s T." ni|
|000008a0| 6c 5d 29 0a 28 66 73 65 | 74 20 27 69 6c 69 73 70 |l]).(fse|t 'ilisp|
|000008b0| 2d 72 61 77 2d 68 61 6e | 64 6c 65 72 20 23 5b 28 |-raw-han|dler #[(|
|000008c0| 70 72 6f 63 65 73 73 20 | 6f 75 74 70 75 74 29 20 |process |output) |
|000008d0| 22 c0 20 87 22 20 5b 72 | 61 77 2d 6b 65 79 73 2d |". ." [r|aw-keys-|
|000008e0| 69 6c 69 73 70 5d 20 31 | 20 22 5c 0a 54 75 72 6e |ilisp] 1| "\.Turn|
|000008f0| 20 6f 6e 20 72 61 77 20 | 6b 65 79 62 6f 61 72 64 | on raw |keyboard|
|00000900| 20 6d 6f 64 65 2e 22 5d | 29 0a 28 66 73 65 74 20 | mode."]|).(fset |
|00000910| 27 69 6c 69 73 70 2d 69 | 6e 74 65 72 61 63 74 69 |'ilisp-i|nteracti|
|00000920| 76 65 2d 68 61 6e 64 6c | 65 72 20 23 5b 28 70 72 |ve-handl|er #[(pr|
|00000930| 6f 63 65 73 73 20 6f 75 | 74 70 75 74 29 20 22 c0 |ocess ou|tput) ".|
|00000940| 20 87 22 20 5b 69 6e 74 | 65 72 61 63 74 69 76 65 | ." [int|eractive|
|00000950| 2d 6b 65 79 73 2d 69 6c | 69 73 70 5d 20 31 20 22 |-keys-il|isp] 1 "|
|00000960| 5c 0a 54 75 72 6e 20 6f | 6e 20 69 6e 74 65 72 61 |\.Turn o|n intera|
|00000970| 63 74 69 76 65 20 6b 65 | 79 62 6f 61 72 64 20 6d |ctive ke|yboard m|
|00000980| 6f 64 65 2e 22 5d 29 0a | 28 66 73 65 74 20 27 69 |ode."]).|(fset 'i|
|00000990| 6f 2d 62 72 69 64 67 65 | 2d 69 6c 69 73 70 20 23 |o-bridge|-ilisp #|
|000009a0| 5b 6e 69 6c 20 22 c0 c1 | 21 88 c2 20 88 c3 c4 0d |[nil "..|!.. ....|
|000009b0| 42 42 89 15 87 22 20 5b | 72 65 71 75 69 72 65 20 |BB..." [|require |
|000009c0| 62 72 69 64 67 65 20 69 | 6e 73 74 61 6c 6c 2d 62 |bridge i|nstall-b|
|000009d0| 72 69 64 67 65 20 28 22 | 31 22 20 2e 20 69 6c 69 |ridge ("|1" . ili|
|000009e0| 73 70 2d 72 61 77 2d 68 | 61 6e 64 6c 65 72 29 20 |sp-raw-h|andler) |
|000009f0| 28 22 30 22 20 2e 20 69 | 6c 69 73 70 2d 69 6e 74 |("0" . i|lisp-int|
|00000a00| 65 72 61 63 74 69 76 65 | 2d 68 61 6e 64 6c 65 72 |eractive|-handler|
|00000a10| 29 20 62 72 69 64 67 65 | 2d 68 61 6e 64 6c 65 72 |) bridge|-handler|
|00000a20| 73 5d 20 33 20 22 5c 0a | 53 65 74 20 75 70 20 73 |s] 3 "\.|Set up s|
|00000a30| 6f 20 74 68 61 74 20 74 | 68 65 20 69 6e 66 65 72 |o that t|he infer|
|00000a40| 69 6f 72 20 4c 49 53 50 | 20 63 61 6e 20 74 75 72 |ior LISP| can tur|
|00000a50| 6e 20 6f 6e 20 45 4d 41 | 43 53 20 72 61 77 20 6d |n on EMA|CS raw m|
|00000a60| 6f 64 65 20 62 79 0a 73 | 65 6e 64 69 6e 67 20 5e |ode by.s|ending ^|
|00000a70| 5b 31 5e 5d 20 61 6e 64 | 20 74 75 72 6e 20 69 74 |[1^] and| turn it|
|00000a80| 20 6f 66 66 20 62 79 20 | 73 65 6e 64 69 6e 67 20 | off by |sending |
|00000a90| 5e 5b 30 5e 5d 2e 22 20 | 6e 69 6c 5d 29 0a 28 66 |^[0^]." |nil]).(f|
|00000aa0| 73 65 74 20 27 64 65 6c | 65 74 65 2d 63 68 61 72 |set 'del|ete-char|
|00000ab0| 2d 6f 72 2d 70 6f 70 2d | 69 6c 69 73 70 20 23 5b |-or-pop-|ilisp #[|
|00000ac0| 28 61 72 67 20 26 6f 70 | 74 69 6f 6e 61 6c 20 6b |(arg &op|tional k|
|00000ad0| 69 6c 6c 66 6c 61 67 29 | 20 22 6d ab 8c c0 c1 21 |illflag)| "m....!|
|00000ae0| 88 c2 c3 20 c4 c5 21 5c | 22 87 c6 c7 0e 08 0e 09 |... ..!\|".......|
|00000af0| 44 5c 22 87 22 20 5b 6d | 65 73 73 61 67 65 20 22 |D\"." [m|essage "|
|00000b00| 50 6f 70 20 4c 49 53 50 | 20 6f 6e 65 20 6c 65 76 |Pop LISP| one lev|
|00000b10| 65 6c 22 20 63 6f 6d 69 | 6e 74 2d 73 69 6d 70 6c |el" comi|nt-simpl|
|00000b20| 65 2d 73 65 6e 64 20 69 | 6c 69 73 70 2d 70 72 6f |e-send i|lisp-pro|
|00000b30| 63 65 73 73 20 69 6c 69 | 73 70 2d 76 61 6c 75 65 |cess ili|sp-value|
|00000b40| 20 63 6f 6d 69 6e 74 2d | 66 69 78 2d 65 72 72 6f | comint-|fix-erro|
|00000b50| 72 20 63 61 6c 6c 2d 69 | 6e 74 65 72 61 63 74 69 |r call-i|nteracti|
|00000b60| 76 65 6c 79 20 64 65 6c | 65 74 65 2d 63 68 61 72 |vely del|ete-char|
|00000b70| 20 61 72 67 20 6b 69 6c | 6c 66 6c 61 67 5d 20 34 | arg kil|lflag] 4|
|00000b80| 20 22 5c 0a 44 65 6c 65 | 74 65 20 41 52 47 20 63 | "\.Dele|te ARG c|
|00000b90| 68 61 72 61 63 74 65 72 | 73 2c 20 6f 72 20 70 6f |haracter|s, or po|
|00000ba0| 70 20 62 72 65 61 6b 20 | 6c 65 76 65 6c 20 69 66 |p break |level if|
|00000bb0| 20 61 74 20 65 6e 64 20 | 6f 66 20 62 75 66 66 65 | at end |of buffe|
|00000bc0| 72 2e 20 20 0a 4f 70 74 | 69 6f 6e 61 6c 20 73 65 |r.  .Opt|ional se|
|00000bd0| 63 6f 6e 64 20 61 72 67 | 20 4b 49 4c 4c 46 4c 41 |cond arg| KILLFLA|
|00000be0| 47 20 6e 6f 6e 2d 6e 69 | 6c 20 6d 65 61 6e 73 20 |G non-ni|l means |
|00000bf0| 6b 69 6c 6c 20 69 6e 73 | 74 65 61 64 20 28 73 61 |kill ins|tead (sa|
|00000c00| 76 65 20 69 6e 20 6b 69 | 6c 6c 20 72 69 6e 67 29 |ve in ki|ll ring)|
|00000c10| 2e 0a 49 6e 74 65 72 61 | 63 74 69 76 65 6c 79 2c |..Intera|ctively,|
|00000c20| 20 41 52 47 20 69 73 20 | 74 68 65 20 70 72 65 66 | ARG is |the pref|
|00000c30| 69 78 20 61 72 67 2c 20 | 61 6e 64 20 4b 49 4c 4c |ix arg, |and KILL|
|00000c40| 46 4c 41 47 20 69 73 20 | 73 65 74 20 69 66 0a 41 |FLAG is |set if.A|
|00000c50| 52 47 20 77 61 73 20 65 | 78 70 6c 69 63 69 74 6c |RG was e|xplicitl|
|00000c60| 79 20 73 70 65 63 69 66 | 69 65 64 2e 22 20 22 70 |y specif|ied." "p|
|00000c70| 22 5d 29 0a             |                         |"]).    |        |
+--------+-------------------------+-------------------------+--------+--------+